home *** CD-ROM | disk | FTP | other *** search
/ CU Amiga Super CD-ROM 4 / CU Amiga Magazine's Super CD-ROM 04 (1996)(EMAP Images)(GB)(Track 1 of 3)[!][issue 1996-11].iso / workbench / s / startup-sequence < prev    next >
Text File  |  1996-09-26  |  2KB  |  71 lines
  1. ; $VER: Startup-Sequence Friday 26-Jul-96 14:31:40
  2. ; Emergency-Pull-Out-All-The-Stops-And-Fix-The-Damn-Thing 1.0
  3.  
  4. C:SetPatch QUIET
  5. c:RightGuard
  6. if WARN
  7.     run >nil: <nil: c:JayMoose19
  8. endif
  9.  
  10. C:Version >NIL:
  11. ;C:AddBuffers >NIL: DF0: 15
  12. FailAt 21
  13. ; This here is HappyENV. Avoids copying ENVARC: to ENV: Cool!
  14. C:MountENV
  15. C:MakeDir RAM:T RAM:Clipboards
  16.  
  17. Resident >NIL: C:Assign PURE
  18. Resident >NIL: C:Execute PURE
  19.  
  20. Assign >NIL: ENV: RAM:ENV
  21. Assign >NIL: T: RAM:T
  22. Assign >NIL: CLIPS: RAM:Clipboards
  23. Assign >NIL: REXX: S:
  24. Assign >NIL: PRINTERS: DEVS:Printers
  25. Assign >NIL: KEYMAPS: DEVS:Keymaps
  26. Assign >NIL: LOCALE: SYS:Locale
  27. Assign >NIL: LIBS: SYS:Classes ADD
  28. Assign >NIL: HELP: LOCALE:Help DEFER
  29. BindDrivers
  30. C:Mount >NIL: DEVS:DOSDrivers/~(#?.info)
  31.  
  32. IF EXISTS DEVS:Monitors
  33.   IF EXISTS DEVS:Monitors/VGAOnly
  34.     DEVS:Monitors/VGAOnly
  35.   EndIF
  36.  
  37.   C:List >NIL: DEVS:Monitors/~(#?.info|VGAOnly) TO T:M LFORMAT "DEVS:Monitors/%s"
  38.   Execute T:M
  39.   C:Delete >NIL: T:M
  40. EndIF
  41.  
  42. SetEnv Language "english"
  43. SetEnv Workbench $Workbench
  44. SetEnv Kickstart $Kickstart
  45. UnSet Workbench
  46. UnSet Kickstart
  47.  
  48. C:AddDataTypes REFRESH QUIET
  49. ;
  50. ; When will we see a new OS that we don't have to bug-fix?
  51. ;
  52. C:PatchOpenWB
  53. C:IPrefs
  54. C:ConClip
  55. Path >NIL: RAM: C: SYS:Utilities SYS:Rexxc SYS:System S: SYS:Prefs SYS:WBStartup SYS:Tools SYS:Tools/Commodities
  56.  
  57. IF EXISTS S:User-Startup
  58.   Execute S:User-Startup
  59. EndIF
  60. Execute CUCD:Support/InitScript BOOT
  61. Resident Execute REMOVE
  62. Resident Assign REMOVE
  63.  
  64. Copy >NIL: CUCD:s/ramicon Ram:Disk.info
  65. C:LoadWB
  66. ;
  67. ; <sigh> if only I had the time.
  68. ;
  69. ;Run >nil: c:pronet-server
  70. EndCLI >NIL:
  71.